home *** CD-ROM | disk | FTP | other *** search
/ Internet.Works 40 / Issue 40.iso / pc / PCSoftware / HTML Tool 3.5 / htmltool.exe / _SETUP.1 / Background Changer.scp < prev    next >
Encoding:
Text File  |  1999-10-03  |  1.8 KB  |  47 lines
  1. <HTMLtool>This script gives you various choices to change the background color</HTMLtool>
  2. <SCRIPT LANGUAGE="JavaScript">
  3. function cols(c1, c2, c3, c4, c5, c6, c7){
  4.     this.c1 = c1;
  5.     this.c2 = c2;
  6.     this.c3 = c3;
  7.     this.c4 = c4;
  8.     this.c5 = c5;
  9.     this.c6 = c6;
  10.     this.c7 = c7; }
  11.  
  12. rainbow = new cols("red", "orange", "yellow", "green", "blue", "indigo", "violet");
  13.  
  14. fade = new cols("white", "DDDDDD", "BBBBBB", "999999", "777777", "555555", "333333", "black");
  15.  
  16. greens = new cols("darkgreen", "forestgreen", "green", "lawngreen", "lightgreen", "limegreen", "palegreen");
  17.  
  18. sunset = new cols("skyblue", "slateblue", "violet", "darkorange", "red", "darkred", "black");
  19.  
  20.  
  21. psyc = new cols("violet", "lawngreen", "violet", "lawngreen", "violet", "lawngreen", "violet");
  22.  
  23. function cycle(type){
  24.     scheme = type;
  25.     document.bgColor = scheme.c1;
  26.     timerID=setTimeout('document.bgColor = scheme.c2', document.selector.interval.value * 10);
  27.     timerID=setTimeout('document.bgColor = scheme.c3', document.selector.interval.value * 20);
  28.     timerID=setTimeout('document.bgColor = scheme.c4', document.selector.interval.value * 30);
  29.     timerID=setTimeout('document.bgColor = scheme.c5', document.selector.interval.value * 40);
  30.     timerID=setTimeout('document.bgColor = scheme.c6', document.selector.interval.value * 50);
  31.     timerID=setTimeout('document.bgColor = scheme.c7', document.selector.interval.value * 60); }
  32.  
  33. </SCRIPT>
  34.  
  35. <FORM NAME="selector">
  36.  
  37. Choose a colour scheme: 
  38. <INPUT TYPE="button" VALUE="Rainbow" onClick="cycle(rainbow)">
  39. <INPUT TYPE="button" VALUE="Fade To Black" onClick="cycle(fade)">
  40. <INPUT TYPE="button" VALUE="Greens" onClick="cycle(greens)">
  41. <INPUT TYPE="button" VALUE="Sunset" onClick="cycle(sunset)">
  42. <INPUT TYPE="button" VALUE="Psychedelic" onClick="cycle(psyc)"><P>
  43.  
  44. Set colour change interval (1/10ths of a second): 
  45. <INPUT TYPE="text" SIZE="8" NAME="interval" VALUE="50">
  46.  
  47. </FORM>